100 DATA 32,228,255,201,0,240,249 110 DATA 162,0,157,0,4,157,0,5 120 DATA 157,0,6,157,0,7,232,208,241 130 DATA 201,32,208,228,96 200 FOR J=8192 TO 8220 210 READ X:T=T+X 220 POKE J,X 230 NEXT J 240 IF T<>3463 THEN STOP 300 PRINT "[147][208]RESS ANY KEY; SPACE BAR TO STOP" 310 SYS 8192